home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2000 #1 / Amiga Plus CD - 2000 - No. 1.iso / Tools / Dev / StormAmigalib / stormamiga_lib / HD-Installer_script < prev    next >
Encoding:
Text File  |  1999-12-03  |  10.7 KB  |  439 lines
  1. ;*************************************************************
  2. ;*   stormamiga.lib Installer Version 3.4d  15.August 1998   *
  3. ;*                                                           *
  4. ;*         Copyright © 1996/98 by CyberdyneSystems           *
  5. ;*                written by Matthias Henze                  *
  6. ;*       english translation written by Thomas Blätte        *
  7. ;*                                                           *
  8. ;*************************************************************
  9. ;
  10. ; $VER: HD-Installer_script 3.4d (15.08.98)
  11.  
  12. (set stormamiga-Version "Version 44.01")
  13. (set stormamiga-Datum "15. August 1998")
  14. (set stormamiga-Datum_e "15. August 1998")
  15.  
  16. ;====================================================================
  17. ; Initialisierungen
  18. ;====================================================================
  19.  
  20. (set @default-dest "")
  21.  
  22. (if (= @language "deutsch")
  23.  (
  24.     (set #welcome (cat
  25.     "\nWillkommen bei der Installation der \n"
  26.     "D E M O V E R S I O N\n"
  27.     "der\n"
  28.     "\"stormamiga.lib\"\n"
  29.     ""stormamiga-Version" vom "stormamiga-Datum"\n\n"
  30.     "Dieses Skript installiert die \"stormamiga.lib\",\n"
  31.     "entsprechend Ihrer Angaben, auf Ihre Festplatte.\n\n\n"
  32.     "Kopierrecht © 1996/98 bei CyberdyneSystems\n"
  33.     "geschrieben von Matthias Henze"))
  34.     
  35.  
  36.     (set #StormC-Version_Auswahl (cat
  37.     "\nMöchten Sie die \"stormamiga.lib\" für StormC V2 oder für StormC V3 installieren.\n"))
  38.  
  39.     (set #V2  " StormC V2")
  40.     (set #V3  " StormC V3")
  41.  
  42.  
  43.     (set #startup_Auswahl (cat
  44.     "\nWelche(n) Startupcode(s) möchten Sie installieren?\n"))
  45.     
  46.     (set #FAR_C_Startupcode       " \"stormamiga_startups.o\"     (Far Code)")
  47.     (set #FAR_C_C++_Startupcode   " \"stormamiga_C++_startups.o\" (Far Code)")
  48.  
  49.     
  50.     (set #Versions_Auswahl (cat
  51.     "\nWählen Sie die Bibliothek(en) aus, die Sie installieren möchten.\n"))
  52.     
  53.     (set #MC68EC020+            " Bibliothek für MC68EC020+")
  54.     
  55.        
  56.     (set #Standardbeispiele_Auswahl (cat
  57.     "\nUm die Vorteile der \"stormamiga.lib\" etwas zu verdeutlichen, habe ich einige Beispiele beigelegt.\n"
  58.     "\nMöchten Sie diese Beispiele installieren.\n"))
  59.     
  60.     (set #ja    "ja")
  61.     (set #nein  "nein")
  62.     
  63.     (set #Beispiele_Liste (cat
  64.     "Installation der Beispiele.\n"
  65.     "Bitte wählen Sie ein Laufwerk oder ein Verzeichnis.\n"
  66.     "Ein Verzeichnis \"stormamiga_lib_Examples\" wird automatisch erzeugt."))
  67.     
  68.     (set #Spezialbeispiele_Auswahl (cat
  69.     "\nUm die Vorteile und Anwendungsmöglichkeiten der Spezialfunktionen etwas zu verdeutlichen, habe ich einige Beispiele beigelegt.\n"
  70.     "Wenn Sie bereits die Standardbeispiele installiert haben, wird automatisch das gleiche Zielverzeichnis benutzt. Ansonsten können Sie ein Zielverzeichnis auswählen.\n"
  71.     "\nMöchten Sie diese Beispiele installieren.\n"))
  72.     
  73.     
  74.     (set #Spezialfunktionen_Auswahl (cat
  75.     "\nMöchten Sie die Spezialfunktionen der \"stormamiga.lib\" nutzen.\n"))
  76.     
  77.     
  78.     (set #User.dic_Auswahl (cat
  79.     "\nUm das Syntax Highlighting auch für die Spezialfunktionen der \"stormamiga.lib\" nutzen zu können, ist es notwendig ein Benutzerlexikon zu installieren.\n"
  80.     "\nWählen Sie aus, ob und mit welchem Name das Benutzerlexikon installiert werden soll.\n"))
  81.     
  82.     (set #User1.dic     "User 1.dic")
  83.     (set #User2.dic     "User 2.dic")
  84.     (set #User3.dic     "User 3.dic")
  85.     (set #kein_User.dic "Kein Benutzerlexikon installieren")
  86.     
  87.     
  88.     (set #Anleitungen_Auswahl (cat
  89.     "\nWählen Sie die Sprache für die AmigaGuide Dokumentation aus.\n"))
  90.     
  91.     (set #Deutsch " Deutsch")
  92.     (set #English " English")
  93.     
  94.     (set #Anleitungen_Liste (cat
  95.     "Installation der Anleitung(en).\n"
  96.     "Bitte wählen Sie ein Laufwerk oder ein Verzeichnis.\n"
  97.     "Es wird kein Verzeichnis erzeugt."))
  98.  )
  99.  (
  100.     (set #welcome (cat
  101.     "\nWelcome to the installation of the\n"
  102.     "D E M O V E R S I O N\n"
  103.     "of\n"
  104.     "\"stormamiga.lib\"\n"
  105.     ""stormamiga-Version" from "stormamiga-Datum_e"\n\n"
  106.     "This script installs the \"stormamiga.lib\"\n"
  107.     "according to your specification to your harddisk.\n\n\n"
  108.     "Copyright © 1996/98 by CyberdyneSystems\n"
  109.     "written by Matthias Henze"))
  110.     
  111.  
  112.     (set #StormC-Version_Auswahl (cat
  113.     "\nPlease choose whether you like to install the \"stormamiga.lib\" for StormC V2 or for StormC V3.\n"))
  114.  
  115.     (set #V2  " StormC V2")
  116.     (set #V3  " StormC V3")
  117.  
  118.  
  119.     (set #startup_Auswahl (cat
  120.     "\nWhich startup code(s) do you want to install?\n"))
  121.     
  122.     (set #FAR_C_Startupcode       " \"stormamiga_startups.o\"     (Far Code)")
  123.     (set #FAR_C_C++_Startupcode   " \"stormamiga_C++_startups.o\" (Far Code)")
  124.  
  125.     
  126.     (set #Versions_Auswahl (cat
  127.     "\nPlease choose the library(-ies) you want to install.\n"))
  128.     
  129.     (set #MC68EC020+            " library for MC68EC020+")
  130.        
  131.  
  132.     (set #Standardbeispiele_Auswahl (cat
  133.     "\nI added some examples to show the advanages of the \"stormamiga.lib\".\n"
  134.     "\nDo you want to install these examples?\n"))
  135.     
  136.     (set #ja    "yes")
  137.     (set #nein  "no")
  138.     
  139.     (set #Beispiele_Liste (cat
  140.     "Installation of the examples.\n"
  141.     "Please choose a volume or directory.\n"
  142.     "A directory \"stormamiga_lib_Examples\" will be created automatically."))
  143.     
  144.     (set #Spezialbeispiele_Auswahl (cat
  145.     "\nI added some examples to show the advanages and features of the special functions.\n"
  146.     "If you allready installed the standard examples, the same destination directory will be used. If not, you may choose a destination directory.\n"
  147.     "\nDo you want to install these examples?\n"))
  148.     
  149.     
  150.     (set #Spezialfunktionen_Auswahl (cat
  151.     "\nDo you want to use the special functions of the \"stormamiga.lib\"?\n"))
  152.     
  153.     
  154.     (set #User.dic_Auswahl (cat
  155.     "\nTo make Syntax Highlighting also available for the special functions of the \"stormamiga.lib\", it is necessary to install a user dictonary.\n"
  156.     "\nPlease choose the name of the user dictionary if you like to install it.\n"))
  157.     
  158.     (set #User1.dic     "User 1.dic")
  159.     (set #User2.dic     "User 2.dic")
  160.     (set #User3.dic     "User 3.dic")
  161.     (set #kein_User.dic "No user dictonary")
  162.     
  163.     
  164.     (set #Anleitungen_Auswahl (cat
  165.     "\nPlease choose the language for the AmigaGuide documentation.\n"))
  166.     
  167.     (set #Deutsch " Deutsch")
  168.     (set #English " English")
  169.     
  170.     (set #Anleitungen_Liste (cat
  171.     "Installation of the manual(s).\n"
  172.     "Please choose a volume or a directory.\n"
  173.     "A new directory will not be created."))
  174.  )
  175. )
  176. (set Quelle-dic "StormSYS/Dictionary/User.dic")
  177. (set Ziel-dic "StormC:StormSYS/Dictionary")
  178.  
  179. ;=====================================================================================
  180. ; Beginn der Installation
  181. ;=====================================================================================
  182.  
  183. (message #welcome)
  184. (welcome)
  185.  
  186. (
  187.   (set StormC-Version
  188.     (askchoice
  189.       (prompt #StormC-Version_Auswahl)
  190.       (help   @askchoice-help)
  191.       (default 1)
  192.       (choices
  193.     #V2
  194.     #V3
  195.       )
  196.     )
  197.   )
  198.   (if (= StormC-Version 0)
  199.     (
  200.       (set Quelle-1 "StormSYS/StormC_V2-startups")
  201.       (set Ziel-1 "StormC:StormSYS")
  202.       (set Quelle-2 "StormC_V2-Examples/standard")
  203.       (set Quelle-3 "StormC_V2-Examples/special")
  204.     )
  205.     (
  206.       (set Quelle-1 "StormSYS/StormC_V3-startups")
  207.       (set Ziel-1 "StormC:StormSYS/startups")
  208.       (set Quelle-2 "StormC_V3-Examples/standard")
  209.       (set Quelle-3 "StormC_V3-Examples/special")
  210.     )
  211.   )
  212. )
  213.  
  214. (if (= (exists "StormC:Include/stormamigainline.h" (noreq)) 1)
  215.   (
  216.     (run "delete StormC:Include/stormamigainline.h")
  217.   )
  218. )
  219.  
  220. (makeassign "INSTTMP" Quelle-1)
  221.  
  222. (
  223.   (set kopiere_startups
  224.     (askoptions
  225.       (prompt #startup_Auswahl)
  226.       (help   @askoptions-help)
  227.       (choices
  228.     #FAR_C_Startupcode
  229.     #FAR_C_C++_Startupcode
  230.       )
  231.     )
  232.   )
  233.   (if (IN kopiere_startups 0) (set FAR_C_Startupcode 1))
  234.   (if (IN kopiere_startups 1) (set FAR_C_C++_Startupcode 1))
  235.  
  236.   (if (= FAR_C_Startupcode 1)
  237.     (copyfiles
  238.       (source "INSTTMP:stormamiga_startups.o")
  239.       (dest Ziel-1)
  240.     )
  241.   )
  242.   (if (= FAR_C_C++_Startupcode 1)
  243.     (copyfiles
  244.       (source "INSTTMP:stormamiga_C++_startups.o")
  245.       (dest Ziel-1)
  246.     )
  247.   )
  248. )
  249.  
  250. (
  251.   (set wähle_Libs
  252.     (askoptions
  253.       (prompt #Versions_Auswahl)
  254.       (help   @askoptions-help)
  255.       (default 1)
  256.       (choices
  257.     #MC68EC020+
  258.       )
  259.     )
  260.   )
  261.   (if (IN wähle_Libs 0) (set MC68EC020+ 1))
  262.  
  263.   (if (= MC68EC020+  1)
  264.     (copyfiles
  265.       (source "lib/stormamiga.lib")
  266.       (dest "StormC:Lib")
  267.     )
  268.   )
  269. )
  270.  
  271. (
  272.   (set kopiere_Standardbeispiele
  273.     (askchoice
  274.       (prompt #Standardbeispiele_Auswahl)
  275.       (help   @askchoice-help)
  276.       (default 0)
  277.       (choices
  278.     #ja
  279.     #nein
  280.       )
  281.     )
  282.   )
  283.   (if (= kopiere_Standardbeispiele 0)
  284.     (
  285.       (set Zielverzeichnis
  286.     (askdir
  287.       (prompt #Beispiele_Liste)
  288.       (help @askdir-help)
  289.       (default "StormC:Examples")
  290.     )
  291.       )
  292.       (makeassign "INST" Zielverzeichnis)
  293.       (copyfiles
  294.     (source Quelle-2)
  295.     (dest "INST:stormamiga_lib_Examples")
  296.     (all)
  297.     (infos)
  298.       )
  299.     )
  300.   )
  301. )
  302.  
  303. (
  304.   (set Spezialfunktionen_Auswahl
  305.     (askchoice
  306.       (prompt #Spezialfunktionen_Auswahl)
  307.       (help   @askchoice-help)
  308.       (default 0)
  309.       (choices
  310.     #ja
  311.     #nein
  312.       )
  313.     )
  314.   )
  315.   (if (= Spezialfunktionen_Auswahl 0)
  316.     (
  317.       (copyfiles
  318.     (source "Include")
  319.     (dest "StormC:Include")
  320.     (all)
  321.       )
  322.       (set kopiere_User.dic
  323.     (askchoice
  324.       (prompt #User.dic_Auswahl)
  325.       (help   @askchoice-help)
  326.       (default 0)
  327.       (choices
  328.         #User1.dic
  329.         #User2.dic
  330.         #User3.dic
  331.         #kein_User.dic
  332.       )
  333.     )
  334.       )
  335.       (if (= kopiere_User.dic 0)
  336.     (copyfiles
  337.       (source Quelle-dic)
  338.       (dest Ziel-dic)
  339.       (newname "User 1.dic")
  340.     )
  341.       )
  342.       (if (= kopiere_User.dic 1)
  343.     (copyfiles
  344.       (source Quelle-dic)
  345.       (dest Ziel-dic)
  346.       (newname "User 2.dic")
  347.     )
  348.       )
  349.       (if (= kopiere_User.dic 2)
  350.     (copyfiles
  351.       (source Quelle-dic)
  352.       (dest Ziel-dic)
  353.       (newname "User 3.dic")
  354.     )
  355.       )
  356.       (set kopiere_Spezialbeispiele
  357.     (askchoice
  358.       (prompt #Spezialbeispiele_Auswahl)
  359.       (help   @askchoice-help)
  360.       (default 0)
  361.       (choices
  362.         #ja
  363.         #nein
  364.       )
  365.     )
  366.       )
  367.       (if (= kopiere_Spezialbeispiele 0)
  368.     (
  369.       (if (exists "INST:stormamiga_lib_Examples" (noreq))
  370.         (copyfiles
  371.           (source Quelle-3)
  372.           (dest "INST:stormamiga_lib_Examples")
  373.           (all)
  374.           (infos)
  375.         )
  376.       )
  377.       (if (= (exists "INST:stormamiga_lib_Examples" (noreq))0)
  378.         (
  379.           (set Zielverzeichnis
  380.         (askdir
  381.           (prompt #Beispiele_Liste)
  382.           (help @askdir-help)
  383.           (default "StormC:Examples")
  384.         )
  385.           )
  386.           (makeassign "INST" Zielverzeichnis)
  387.           (copyfiles
  388.         (source Quelle-3)
  389.         (dest "INST:stormamiga_lib_Examples")
  390.         (all)
  391.         (infos)
  392.           )
  393.         )
  394.       )
  395.     )
  396.       )
  397.     )
  398.   )
  399. )
  400.  
  401. (
  402.   (set kopiere_Anleitungen
  403.     (askchoice
  404.       (prompt #Anleitungen_Auswahl)
  405.       (help   @askchoice-help)
  406.       (if (= @language "deutsch")
  407.     ((default 0))
  408.     ((default 1))
  409.       )
  410.       (choices
  411.     #Deutsch
  412.     #English
  413.       )
  414.     )
  415.   )
  416.   (if (= kopiere_Anleitungen 0) (set Quelle-D "stormamiga_lib.guide"))
  417.   (if (= kopiere_Anleitungen 1) (set Quelle-D "stormamiga_lib_e.guide"))
  418.   (
  419.     (set Dokverzeichnis
  420.       (askdir
  421.     (prompt #Anleitungen_Liste)
  422.     (help @askdir-help)
  423.     (default "StormC:")
  424.     (disk)
  425.       )
  426.     )
  427.     (makeassign "INSTDOK" Dokverzeichnis)
  428.     (copyfiles
  429.       (source Quelle-D)
  430.       (dest "INSTDOK:")
  431.       (infos)
  432.     )
  433.   )
  434. )
  435.  
  436. (makeassign "INSTTMP")
  437. (makeassign "INST")
  438. (makeassign "INSTDOK")
  439.